* lisp/files.el (interpreter-mode-alist): Use tcl-mode for expect scripts.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6a77df43929c807d4fc4090e32dce7c3d712a1db..42cd84ec6d5597cd723e5d5565ce7b98a5c1f159 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2013-08-23  Glenn Morris  <rgm@gnu.org>
 
+       * files.el (interpreter-mode-alist): Use tcl-mode for expect scripts.
+
        * files.el (create-file-buffer): Handle the vital case of a file
        whose basename is all spaces.  (Bug#15162)
 

diff --git a/lisp/files.el b/lisp/files.el
index 71dc968f160d52a6945a73d45616e157306de6ae..9adbca1036968002a9eb798d77386960d9891e7d 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -2455,6 +2455,7 @@ and `magic-mode-alist', which determines modes based on file contents.")
      ("wishx" . tcl-mode)
      ("tcl" . tcl-mode)
      ("tclsh" . tcl-mode)
+     ("expect" . tcl-mode)
      ("scm" . scheme-mode)
      ("ash" . sh-mode)
      ("bash" . sh-mode)